home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / versa11.arc / VERSA1.MNU < prev    next >
Encoding:
Text File  |  1987-05-23  |  13.4 KB  |  512 lines
  1. SELECT:
  2. SWIT S1
  3. CASE"404"
  4. GOTO ATLANTA
  5. ENDC
  6. CASE"617"
  7. GOTO BOSTON
  8. ENDC
  9. CASE"216"
  10. GOTO CLEVELAN
  11. ENDC
  12. CASE"313"
  13. GOTO DETROIT
  14. ENDC
  15. CASE"305"
  16. GOTO MIAMI
  17. ENDC
  18. CASE"201"
  19. GOTO NEWARK
  20. ENDC
  21. DEFA
  22. ASSI S9"ERROR"
  23. EXEC"VERSA.CMD"
  24. ENDC
  25. ENDS
  26. ATLANTA:
  27. CLEA
  28. LOCA 2,0
  29. MESS"               ╒════════╡ Atlanta BBS Directory  (404) ╞════════╕"
  30. MESS"               │                                                │"
  31. MESS"               │       -Board-                      -SIG-       │"
  32. MESS"               │                                                │"
  33. MESS"               │  < 1> GBBS                                     │"
  34. MESS"               │  < 2> Flagship BBS                             │"
  35. MESS"               │  < 3> Atlanta PCUG                 Unprotects  │"
  36. MESS"               │  < 4> T. J.'s                                  │"
  37. MESS"               │  < 5> Kahn's BBS      Artificial Intelligence  │"
  38. MESS"               │  < 6> Southside BBS                            │"
  39. MESS"               │  < 7> Gumby's Place                            │"
  40. MESS"               │  < 8> La Chateau                               │"
  41. MESS"               │  < 9>                                          │"
  42. MESS"               │  <10>                                          │"
  43. MESS"               │                                                │"
  44. MESS"               │          <G>o back to city selection           │"
  45. MESS"               │                                                │"
  46. MESS"               ├────────────────────────────────────────────────┤"
  47. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  48. MESS"               ╘════════════════════════════════════════════════╛"
  49. LOCA 20,56
  50. GET S9 7
  51. SWIT S9
  52. CASE"1"
  53. ASSI S2"4576815"
  54. ;ASSI S7"COMMAND.VER"
  55. ENDC
  56. CASE"2"
  57. ASSI S2"9346299"
  58. ;ASSI S7"COMMAND.VER"
  59. ENDC
  60. CASE"3"
  61. ASSI S2"4330062"
  62. ;ASSI S7"COMMAND.VER"
  63. ENDC
  64. CASE"4"
  65. ASSI S2"3921756"
  66. ;ASSI S7"COMMAND.VER"
  67. ENDC
  68. CASE"5"
  69. ASSI S2"9346299"
  70. ;ASSI S7"COMMAND.VER"
  71. ENDC
  72. CASE"6"
  73. ASSI S2"7670092"
  74. ;ASSI S7"COMMAND.VER"
  75. ENDC
  76. CASE"7"
  77. ASSI S2"9396569"
  78. ;ASSI S7"COMMAND.VER"
  79. ENDC
  80. CASE"8"
  81. ASSI S2"9877940"
  82. ;ASSI S7"COMMAND.VER"
  83. ENDC
  84. CASE"9"
  85. ASSI S2"XXXXXXX"
  86. ;ASSI S7"COMMAND.VER"
  87. ENDC
  88. CASE"10"
  89. ASSI S2"XXXXXXX"
  90. ;ASSI S7"COMMAND.VER"
  91. ENDC
  92. CASE"D"
  93. EXEC"VERSA.CMD"
  94. ENDC
  95. CASE"E"
  96. EXEC"VERSA.CMD"
  97. ENDC
  98. CASE"G"
  99. EXEC"VERSA.CMD"
  100. ENDC
  101. DEFA
  102. ASSI S2 S9
  103. ENDC
  104. ENDS
  105. ASSI S9"ACTIVE"
  106. EXEC"VERSA.CMD"
  107. BOSTON:
  108. CLEA
  109. LOCA 2,0
  110. MESS"               ╒═════════╡ Boston BBS Directory (617) ╞═════════╕"
  111. MESS"               │                                                │"
  112. MESS"               │       -Board-                      -SIG-       │"
  113. MESS"               │                                                │"
  114. MESS"               │  < 1> Boston Computer Society                  │"
  115. MESS"               │  < 2> Alpha Computer Society                   │"
  116. MESS"               │  < 3> Wonderland BBS                           │"
  117. MESS"               │  < 4> Harvard BBS                              │"
  118. MESS"               │  < 5> Microcom's MNP                 MNP Info  │"
  119. MESS"               │  < 6> Boston Fog                               │"
  120. MESS"               │  < 7> PC Week FIDO                             │"
  121. MESS"               │  < 8> The Billboard                            │"
  122. MESS"               │  < 9> Northeastern Exchange                    │"
  123. MESS"               │  <10>                                          │"
  124. MESS"               │                                                │"
  125. MESS"               │          <G>o back to city selection           │"
  126. MESS"               │                                                │"
  127. MESS"               ├────────────────────────────────────────────────┤"
  128. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  129. MESS"               ╘════════════════════════════════════════════════╛"
  130. LOCA 20,56
  131. GET S9 7
  132. SWIT S9
  133. CASE"1"
  134. ASSI S2"2373750"
  135. ;ASSI S7"COMMAND.VER"
  136. ENDC
  137. CASE"2"
  138. ASSI S2"2292915"
  139. ;ASSI S7"COMMAND.VER"
  140. ENDC
  141. CASE"3"
  142. ASSI S2"6653796"
  143. ;ASSI S7"COMMAND.VER"
  144. ENDC
  145. CASE"4"
  146. ASSI S2"4984379"
  147. ;ASSI S7"COMMAND.VER"
  148. ENDC
  149. CASE"5"
  150. ASSI S2"7699358"
  151. ;ASSI S7"COMMAND.VER"
  152. ENDC
  153. CASE"6"
  154. ASSI S2"2884667"
  155. ;ASSI S7"COMMAND.VER"
  156. ENDC
  157. CASE"7"
  158. ASSI S2"5361917"
  159. ;ASSI S7"COMMAND.VER"
  160. ENDC
  161. CASE"8"
  162. ASSI S2"9658761"
  163. ;ASSI S7"COMMAND.VER"
  164. ENDC
  165. CASE"9"
  166. ASSI S2"9653121"
  167. ;ASSI S7"COMMAND.VER"
  168. ENDC
  169. CASE"10"
  170. ASSI S2"XXXXXXX"
  171. ;ASSI S7"COMMAND.VER"
  172. ENDC
  173. CASE"D"
  174. EXEC"VERSA.CMD"
  175. ENDC
  176. CASE"E"
  177. EXEC"VERSA.CMD"
  178. ENDC
  179. CASE"G"
  180. EXEC"VERSA.CMD"
  181. ENDC
  182. DEFA
  183. ASSI S2 S9
  184. ENDC
  185. ENDS
  186. ASSI S9"ACTIVE"
  187. EXEC"VERSA.CMD"
  188. CLEVELAN:
  189. CLEA
  190. LOCA 2,0
  191. MESS"               ╒═══════╡ Cleveland BBS Directory  (216) ╞═══════╕"
  192. MESS"               │                                                │"
  193. MESS"               │       -Board-                      -SIG-       │"
  194. MESS"               │                                                │"
  195. MESS"               │  < 1> Cleveland RBBS                           │"
  196. MESS"               │  < 2> InfoGuide                                │"
  197. MESS"               │  < 3> InfoGuide (other line)                   │"
  198. MESS"               │  < 4> Micro-Chip                               │"
  199. MESS"               │  < 5> GCPCUG/JCU BBS                           │"
  200. MESS"               │  < 6> The Machine                              │"
  201. MESS"               │  < 7> Free-Net                                 │"
  202. MESS"               │  < 8> Data-Term                                │"
  203. MESS"               │  < 9> Dog House                                │"
  204. MESS"               │  <10>                                          │"
  205. MESS"               │                                                │"
  206. MESS"               │          <G>o back to city selection           │"
  207. MESS"               │                                                │"
  208. MESS"               ├────────────────────────────────────────────────┤"
  209. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  210. MESS"               ╘════════════════════════════════════════════════╛"
  211. LOCA 20,56
  212. GET S9 7
  213. SWIT S9
  214. CASE"1"
  215. ASSI S2"3313576"
  216. ;ASSI S7"COMMAND.VER"
  217. ENDC
  218. CASE"2"
  219. ASSI S2"6213434"
  220. ;ASSI S7"COMMAND.VER"
  221. ENDC
  222. CASE"3"
  223. ASSI S2"6213435"
  224. ;ASSI S7"COMMAND.VER"
  225. ENDC
  226. CASE"4"
  227. ASSI S2"2256130"
  228. ;ASSI S7"COMMAND.VER"
  229. ENDC
  230. CASE"5"
  231. ASSI S2"3974256"
  232. ;ASSI S7"COMMAND.VER"
  233. ENDC
  234. CASE"6"
  235. ASSI S2"2521288"
  236. ;ASSI S7"COMMAND.VER"
  237. ENDC
  238. CASE"7"
  239. ASSI S2"3683888"
  240. ;ASSI S7"COMMAND.VER"
  241. ENDC
  242. CASE"8"
  243. ASSI S2"5623263"
  244. ;ASSI S7"COMMAND.VER"
  245. ENDC
  246. CASE"9"
  247. ASSI S2"2510110"
  248. ;ASSI S7"COMMAND.VER"
  249. ENDC
  250. CASE"10"
  251. ASSI S2"XXXXXXX"
  252. ;ASSI S7"COMMAND.VER"
  253. ENDC
  254. CASE"D"
  255. EXEC"VERSA.CMD"
  256. ENDC
  257. CASE"E"
  258. EXEC"VERSA.CMD"
  259. ENDC
  260. CASE"G"
  261. EXEC"VERSA.CMD"
  262. ENDC
  263. DEFA
  264. ASSI S2 S9
  265. ENDC
  266. ENDS
  267. ASSI S9"ACTIVE"
  268. EXEC"VERSA.CMD"
  269. DETROIT:
  270. CLEA
  271. LOCA 2,0
  272. MESS"               ╒════════╡ Detroit BBS Directory  (313) ╞════════╕"
  273. MESS"               │                                                │"
  274. MESS"               │       -Board-                      -SIG-       │"
  275. MESS"               │                                                │"
  276. MESS"               │  < 1> PCUTIL                                   │"
  277. MESS"               │  < 2> Freeform                                 │"
  278. MESS"               │  < 3> East Area BBS                            │"
  279. MESS"               │  < 4> Microchip                                │"
  280. MESS"               │  < 5> 007's Computer Runway                    │"
  281. MESS"               │  < 6> Daedalus                                 │"
  282. MESS"               │  < 7> Arcade                                   │"
  283. MESS"               │  < 8> 23 Cutting Board                         │"
  284. MESS"               │  < 9> Bit Bucket                               │"
  285. MESS"               │  <10>                                          │"
  286. MESS"               │                                                │"
  287. MESS"               │          <G>o back to city selection           │"
  288. MESS"               │                                                │"
  289. MESS"               ├────────────────────────────────────────────────┤"
  290. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  291. MESS"               ╘════════════════════════════════════════════════╛"
  292. LOCA 20,56
  293. GET S9 7
  294. SWIT S9
  295. CASE"1"
  296. ASSI S2"3930527"
  297. ;ASSI S7"COMMAND.VER"
  298. ENDC
  299. CASE"2"
  300. ASSI S2"7747258"
  301. ;ASSI S7"COMMAND.VER"
  302. ENDC
  303. CASE"3"
  304. ASSI S2"9496665"
  305. ;ASSI S7"COMMAND.VER"
  306. ENDC
  307. CASE"4"
  308. ASSI S2"9496745"
  309. ;ASSI S7"COMMAND.VER"
  310. ENDC
  311. CASE"5"
  312. ASSI S2"3488535"
  313. ;ASSI S7"COMMAND.VER"
  314. ENDC
  315. CASE"6"
  316. ASSI S2"9331425"
  317. ;ASSI S7"COMMAND.VER"
  318. ENDC
  319. CASE"7"
  320. ASSI S2"9788087"
  321. ;ASSI S7"COMMAND.VER"
  322. ENDC
  323. CASE"8"
  324. ASSI S2"2917716"
  325. ;ASSI S7"COMMAND.VER"
  326. ENDC
  327. CASE"9"
  328. ASSI S2"3430877"
  329. ;ASSI S7"COMMAND.VER"
  330. ENDC
  331. CASE"10"
  332. ASSI S2"XXXXXXX"
  333. ;ASSI S7"COMMAND.VER"
  334. ENDC
  335. CASE"D"
  336. EXEC"VERSA.CMD"
  337. ENDC
  338. CASE"E"
  339. EXEC"VERSA.CMD"
  340. ENDC
  341. CASE"G"
  342. EXEC"VERSA.CMD"
  343. ENDC
  344. DEFA
  345. ASSI S2 S9
  346. ENDC
  347. ENDS
  348. ASSI S9"ACTIVE"
  349. EXEC"VERSA.CMD"
  350. MIAMI:
  351. CLEA
  352. LOCA 2,0
  353. MESS"               ╒═════════╡ Miami BBS Directory  (305) ╞═════════╕"
  354. MESS"               │                                                │"
  355. MESS"               │       -Board-                      -SIG-       │"
  356. MESS"               │                                                │"
  357. MESS"               │  < 1> Adults Only II                           │"
  358. MESS"               │  < 2> Miami PC Network                         │"
  359. MESS"               │  < 3> Miami Users Group                        │"
  360. MESS"               │  < 4> The Kendall Switchboard                  │"
  361. MESS"               │  < 5> CompuSci Fido                            │"
  362. MESS"               │  < 6> Genesis BBS                              │"
  363. MESS"               │  < 7> John Galt Line                           │"
  364. MESS"               │  < 8> Miami Dade Fido                          │"
  365. MESS"               │  < 9>                                          │"
  366. MESS"               │  <10>                                          │"
  367. MESS"               │                                                │"
  368. MESS"               │          <G>o back to city selection           │"
  369. MESS"               │                                                │"
  370. MESS"               ├────────────────────────────────────────────────┤"
  371. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  372. MESS"               ╘════════════════════════════════════════════════╛"
  373. LOCA 20,56
  374. GET S9 7
  375. SWIT S9
  376. CASE"1"
  377. ASSI S2"5944526"
  378. ;ASSI S7"COMMAND.VER"
  379. ENDC
  380. CASE"2"
  381. ASSI S2"9354964"
  382. ;ASSI S7"COMMAND.VER"
  383. ENDC
  384. CASE"3"
  385. ASSI S2"6217534"
  386. ;ASSI S7"COMMAND.VER"
  387. ENDC
  388. CASE"4"
  389. ASSI S2"2712146"
  390. ;ASSI S7"COMMAND.VER"
  391. ENDC
  392. CASE"5"
  393. ASSI S2"7584871"
  394. ;ASSI S7"COMMAND.VER"
  395. ENDC
  396. CASE"6"
  397. ASSI S2"8952998"
  398. ;ASSI S7"COMMAND.VER"
  399. ENDC
  400. CASE"7"
  401. ASSI S2"2351645"
  402. ;ASSI S7"COMMAND.VER"
  403. ENDC
  404. CASE"8"
  405. ASSI S2"3472970"
  406. ;ASSI S7"COMMAND.VER"
  407. ENDC
  408. CASE"9"
  409. ASSI S2"XXXXXXX"
  410. ;ASSI S7"COMMAND.VER"
  411. ENDC
  412. CASE"10"
  413. ASSI S2"XXXXXXX"
  414. ;ASSI S7"COMMAND.VER"
  415. ENDC
  416. CASE"D"
  417. EXEC"VERSA.CMD"
  418. ENDC
  419. CASE"E"
  420. EXEC"VERSA.CMD"
  421. ENDC
  422. CASE"G"
  423. EXEC"VERSA.CMD"
  424. ENDC
  425. DEFA
  426. ASSI S2 S9
  427. ENDC
  428. ENDS
  429. ASSI S9"ACTIVE"
  430. EXEC"VERSA.CMD"
  431. NEWARK:
  432. CLEA
  433. LOCA 2,0
  434. MESS"               ╒═════════╡ Newark BBS Directory (201) ╞═════════╕"
  435. MESS"               │                                                │"
  436. MESS"               │       -Board-                      -SIG-       │"
  437. MESS"               │                                                │"
  438. MESS"               │  < 1> Microsellar               120 Megabytes  │"
  439. MESS"               │  < 2> Hotel California                         │"
  440. MESS"               │  < 3> SEA Board                   Home of ARC  │"
  441. MESS"               │  < 4> Sparta                   Hard Disk Info  │"
  442. MESS"               │  < 5> The Data Base     123, dBase, Framework  │"
  443. MESS"               │  < 6> BOSS BBS                                 │"
  444. MESS"               │  < 7> Shelter                                  │"
  445. MESS"               │  < 8> Ed Gelb's                                │"
  446. MESS"               │  < 9>                                          │"
  447. MESS"               │  <10>                                          │"
  448. MESS"               │                                                │"
  449. MESS"               │          <G>o back to city selection           │"
  450. MESS"               │                                                │"
  451. MESS"               ├────────────────────────────────────────────────┤"
  452. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  453. MESS"               ╘════════════════════════════════════════════════╛"
  454. LOCA 20,56
  455. GET S9 7
  456. SWIT S9
  457. CASE"1"
  458. ASSI S2"2391346"
  459. ;ASSI S7"COMMAND.VER"
  460. ENDC
  461. CASE"2"
  462. ASSI S2"3278245"
  463. ;ASSI S7"COMMAND.VER"
  464. ENDC
  465. CASE"3"
  466. ASSI S2"6943348"
  467. ;ASSI S7"COMMAND.VER"
  468. ENDC
  469. CASE"4"
  470. ASSI S2"7295377"
  471. ;ASSI S7"COMMAND.VER"
  472. ENDC
  473. CASE"5"
  474. ASSI S2"9435419"
  475. ;ASSI S7"COMMAND.VER"
  476. ENDC
  477. CASE"6"
  478. ASSI S2"5687293"
  479. ;ASSI S7"COMMAND.VER"
  480. ENDC
  481. CASE"7"
  482. ASSI S2"7837458"
  483. ;ASSI S7"COMMAND.VER"
  484. ENDC
  485. CASE"8"
  486. ASSI S2"6947425"
  487. ;ASSI S7"COMMAND.VER"
  488. ENDC
  489. CASE"9"
  490. ASSI S2"XXXXXXX"
  491. ;ASSI S7"COMMAND.VER"
  492. ENDC
  493. CASE"10"
  494. ASSI S2"XXXXXXX"
  495. ;ASSI S7"COMMAND.VER"
  496. ENDC
  497. CASE"D"
  498. EXEC"VERSA.CMD"
  499. ENDC
  500. CASE"E"
  501. EXEC"VERSA.CMD"
  502. ENDC
  503. CASE"G"
  504. EXEC"VERSA.CMD"
  505. ENDC
  506. DEFA
  507. ASSI S2 S9
  508. ENDC
  509. ENDS
  510. ASSI S9"ACTIVE"
  511. EXEC"VERSA.CMD"
  512.